home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / bbs_util / tgdev301.zip / TESTINC.PAS < prev    next >
Pascal/Delphi Source File  |  1996-06-09  |  2KB  |  41 lines
  1. {$I TELEGARD.INC }
  2.  
  3. begin
  4. writeln;
  5. writeln('Record Sizes (Telegard structures only!)');
  6. writeln;
  7. writeln('ConfigRec =   ',sizeof(configrec));
  8. writeln('SystemRec =   ',sizeof(systemrec));
  9. writeln('UserRec =     ',sizeof(userrec));
  10. Writeln('UserIdxRec =  ',sizeof(useridxrec));
  11. Writeln('IDIdxRec =    ',sizeof(ididxrec));
  12. Writeln('AreaIdxRec =  ',sizeof(areaidxrec));
  13. writeln('FAreaRec =    ',sizeof(farearec));
  14. writeln('FileIdxRec =  ',sizeof(fileidxrec));
  15. writeln('FbRec =       ',sizeof(fbrec));
  16. writeln('FbExtRec =    ',sizeof(fbextrec));
  17. writeln('DriveRec =    ',sizeof(driverec));
  18. writeln('QueueRec =    ',sizeof(queuerec));
  19. writeln('MAreaRec =    ',sizeof(marearec));
  20. writeln('MenuHdrRec =  ',sizeof(menurec));
  21. writeln('MenuItemRec = ',sizeof(commandrec));
  22. writeln('BbsListRec =  ',sizeof(bbslistrec));
  23. writeln('ArchiveRec =  ',sizeof(archiverec));
  24. writeln('GroupRec =    ',sizeof(confrec));
  25. writeln('EventRec =    ',sizeof(eventrec));
  26. writeln('HistoryRec =  ',sizeof(historyrec));
  27. writeln('IemsiRec =    ',sizeof(iemsirec));
  28. writeln('LanguageRec = ',sizeof(languagerec));
  29. writeln('LCallersRec = ',sizeof(lcallers));
  30. writeln('LevelsRec =   ',sizeof(levelsrec));
  31. writeln('MacroRec =    ',sizeof(macrorec));
  32. writeln('ModemRec =    ',sizeof(modemrec));
  33. writeln('NetworkRec =  ',sizeof(networkrec));
  34. writeln('NodesRec =    ',sizeof(nodesrec));
  35. writeln('ProtRec =     ',sizeof(protrec));
  36. writeln('ShortMsgRec = ',sizeof(shortmsgrec));
  37. writeln('SmacroRec =   ',sizeof(smacrorec));
  38. writeln('TimelogRec =  ',sizeof(timelogrec));
  39. writeln('VoteRec =     ',sizeof(voterec));
  40. end.
  41.